home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / acf514r0.zip / TOZIP.BAT < prev    next >
Encoding:
DOS Batch File  |  1991-01-27  |  1.0 KB  |  38 lines
  1. @echo off
  2. REM MOVE.BAT - For ACFiles
  3. REM Arguments: %1 - Path to File, %2 - Filename, %3 - Filename Without .EXT
  4. REM Arguments: %4 - Extension of Filename (No ., just EXT)
  5. :
  6. :Check For ARC/LZH/PAK/ZOO/ZIP Files
  7. :IF One of those, goto ZIP
  8. :
  9. if %4 == ARC goto zip
  10. if %4 == LZH goto zip
  11. if %4 == PAK goto zip
  12. if %4 == ZOO goto zip
  13. :if it isn't, write original filename to filename via echo
  14. echo %3.%4 >filename
  15. goto end
  16. :zip
  17. md 1111
  18. cd 1111
  19. if %4 == LZH lharc e %1%3
  20. if %4 == PAK pak e %1%3
  21. if %4 == ZOO zoo e %1%3
  22. if %4 == ARC pkxarc %1%3
  23. if %4 == ZIP pkunzip %1%3
  24. :if not zip file, then convert to .ZIP
  25. if not %4 == ZIP pkzip %1%3 *.*
  26. :make filename Yes to contain input for the delete statement
  27. echo Y >..\yes
  28. :redirect input from previous file
  29. del *.* <..\yes
  30. cd..
  31. rd 1111
  32. :delete file if it was converted (not .ZIP already)
  33. if not %4 == ZIP del %1%2
  34. :put new filename into file called FILENAME to use for new list, etc.
  35. :acfiles reads this in to find out what it should put as the filename for .LSTs
  36. echo %3.ZIP >filename
  37. :end
  38.